home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1991 …esperately Seeking Seven / Desperately Seeking Seven.2mg / Dev.CD.8 / Essentials / Tools / AppleScanGS / doScan < prev    next >
Encoding:
Text File  |  1990-11-14  |  1.2 KB  |  46 lines  |  [04] ASCII Text (0x0000)
  1. /*********************************************************************************************/
  2.  
  3. long doScan(bufferHandle, bufferSize, sWindowDef, Width, Length)
  4. Handle            bufferHandle;
  5. unsigned long    bufferSize, Width, Length;
  6. scannerWindowDef *sWindowDef;
  7. {
  8.     extern Long (*Setup[])();
  9.     unsigned long requestCount, transferCount;
  10.  
  11.     Scanner_Open();
  12.     
  13.     transferCount = (*Setup[Scanner_Type])(bufferHandle, bufferSize, sWindowDef, Width, Length);
  14.     
  15.     Scanner_Close();
  16.     return(transferCount);
  17. }
  18.  
  19. long Setup_Apple(bufferHandle, bufferSize, sWindowDef, Width, Length)
  20. Handle            bufferHandle;
  21. unsigned long    bufferSize, Width, Length;
  22. scannerWindowDef *sWindowDef;
  23. {
  24.     unsigned long requestCount, transferCount;
  25.     Scanner_SetMode();
  26.     Scanner_SetHalfTones();
  27.     Scanner_DefWindow(sWindowDef);
  28.     Scanner_Scan();
  29.     
  30.     transferCount = Scanner_Read(*bufferHandle, bufferSize);
  31.  
  32.     return(transferCount);
  33. }
  34.  
  35. long Setup_CPCScan(bufferHandle, bufferSize, sWindowDef, Width, Length)
  36. Handle            bufferHandle;
  37. unsigned long    bufferSize, Width, Length;
  38. scannerWindowDef *sWindowDef;
  39. {
  40.     unsigned long requestCount, transferCount;
  41.     
  42.     transferCount = CPC_Scan(*bufferHandle, bufferSize, Width, Length);
  43.  
  44.     return(transferCount);
  45. }
  46.